home *** CD-ROM | disk | FTP | other *** search
/ TPUG - Toronto PET Users Group / TPUG Users Group CD / TPUG Users Group CD.iso / C64 / B-Business / (c)b4.d64 / file_boot (.txt) < prev    next >
Commodore BASIC  |  2007-02-04  |  567b  |  20 lines

  1. 1 REM PONZO/84/WATERLOO
  2. 2 REM"[184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184]
  3. 3 [143] FILE/BOOT
  4. 4 [143]"FREFREFREFREFREFREFREFREFRE
  5. 10 POKE56,7*16+12:POKE55,8*16:CLR
  6. 15 POKE53281,6:POKE53280,6:PRINTCHR$(14)
  7. 20 F1$="FILE/SORT":F2$="FILE/MASTER"
  8. 25 PRINT"[147][215]HERE IS "F1$" AND "F2$
  9. 30 INPUT"DRIVE   0[157][157][157]";DR$:POKE704,VAL(DR$)
  10. 31 PRINT"[147]NOTE:[157][157][157][157][157][184][184][184][184][145]";
  11. 32 PRINT" [193]FTER [198][201][204][197]/[205][193][211][212][197][210] IS [204][207][193][196]ED"
  12. 33 PRINT" HIT E[146] FOR AN EXPLANATION."
  13. 35 PRINT"LOADING:"F1$,F2$
  14. 36 F1$=F1$+"*":F2$=F2$+"*"
  15. 40 PRINT"LOAD"CHR$(34)DR$":"F1$CHR$(34)",8,1"
  16. 50 PRINT"NEW"
  17. 60 PRINT"LOAD"CHR$(34)DR$":"F2$CHR$(34)",8"
  18. 70 PRINT"RUN"
  19. 100 POKE198,5:FORI=0TO4:POKE631+I,13:NEXT:END
  20.